home *** CD-ROM | disk | FTP | other *** search
/ Carousel / CAROUSEL.cdr / mactosh / hc / form1040.sit / Form 1040 / background_11132.txt < prev    next >
Text File  |  1988-02-12  |  3KB  |  128 lines
  1. -- background: 11132 from stack: in
  2. -- bmap block id: 19494
  3. -- flags: 4000
  4. -- background id: 0
  5. -- name: 
  6. ----- HyperTalk script -----
  7.  
  8.  
  9.  
  10.  
  11.  
  12.  
  13. -- part 11 (button)
  14. -- low flags: 00
  15. -- high flags: 2000
  16. -- rect: left=462 top=25 right=60 bottom=501
  17. -- title width / last selected line: 0
  18. -- icon id / first selected line: 20098 / 20098
  19. -- text alignment: 1
  20. -- font id: 0
  21. -- text size: 12
  22. -- style flags: 0
  23. -- line height: 16
  24. -- part name: Home
  25. ----- HyperTalk script -----
  26. on mouseUp
  27.   visual effect iris close
  28.   go "home"
  29. end mouseUp
  30.  
  31.  
  32.  
  33. -- part 12 (button)
  34. -- low flags: 00
  35. -- high flags: 2000
  36. -- rect: left=469 top=310 right=338 bottom=506
  37. -- title width / last selected line: 0
  38. -- icon id / first selected line: 1012 / 1012
  39. -- text alignment: 1
  40. -- font id: 0
  41. -- text size: 12
  42. -- style flags: 0
  43. -- line height: 16
  44. -- part name: Return
  45. ----- HyperTalk script -----
  46. on mouseUp
  47.   visual effect iris close
  48.   go Back
  49. end mouseUp
  50.  
  51.  
  52.  
  53. -- part 13 (button)
  54. -- low flags: 00
  55. -- high flags: 2000
  56. -- rect: left=414 top=27 right=62 bottom=453
  57. -- title width / last selected line: 0
  58. -- icon id / first selected line: 22855 / 22855
  59. -- text alignment: 1
  60. -- font id: 0
  61. -- text size: 12
  62. -- style flags: 0
  63. -- line height: 16
  64. -- part name: Yearly
  65. ----- HyperTalk script -----
  66. on mouseUp
  67.   get the seconds
  68.   convert it to dateItems
  69.   put ((item 1 of it) - 1987) *2 into whichSix
  70.   if item 2 of it > 6 then add 1 to whichSix
  71.   visual effect zoom open
  72.   if whichSix < 1 then go card 1 of stack "DateBook"
  73.   else if whichSix > 5 then go card 5 of stack "DateBook"
  74.   else
  75.     go to card whichSix of stack "DateBook"
  76.     send "bracketWeek" && the seconds to this card
  77.   end if
  78. end mouseUp
  79.  
  80.  
  81.  
  82. -- part 21 (field)
  83. -- low flags: 01
  84. -- high flags: 0002
  85. -- rect: left=428 top=71 right=89 bottom=493
  86. -- title width / last selected line: 0
  87. -- icon id / first selected line: 0 / 0
  88. -- text alignment: 1
  89. -- font id: 3
  90. -- text size: 12
  91. -- style flags: 0
  92. -- line height: 16
  93. -- part name: 
  94.  
  95.  
  96. -- part 23 (button)
  97. -- low flags: 00
  98. -- high flags: 2000
  99. -- rect: left=468 top=271 right=303 bottom=504
  100. -- title width / last selected line: 0
  101. -- icon id / first selected line: 2478 / 2478
  102. -- text alignment: 1
  103. -- font id: 0
  104. -- text size: 12
  105. -- style flags: 0
  106. -- line height: 16
  107. -- part name: New Button
  108. ----- HyperTalk script -----
  109. on mouseUp
  110.   visual effect iris close
  111.   go to card ID 18856
  112. end mouseUp
  113.  
  114.  
  115.  
  116. -- part 24 (field)
  117. -- low flags: 01
  118. -- high flags: 0002
  119. -- rect: left=13 top=34 right=52 bottom=386
  120. -- title width / last selected line: 0
  121. -- icon id / first selected line: 0 / 0
  122. -- text alignment: 1
  123. -- font id: 3
  124. -- text size: 12
  125. -- style flags: 256
  126. -- line height: 16
  127. -- part name: 
  128.